#include <memory>
#include <iostream>
#include <unistd.h>
#include "Socket.hpp"
#include "Log.hpp"

using namespace SocketModule;
using namespace LogModule;

class SelectServer
{
    const static int defaultfd = -1;
    const static int size = sizeof(fd_set) * 8; // 辅助数组的大小
    
public:
    SelectServer(int port) : _listensock(std::make_unique<TcpSocket>()), _isrunning(false)
    {
        _listensock->BuildTcpClientSocketMethod();
        for (int i = 0; i < size; i++)
            _fd_arry[i] = defaultfd;

        _fd_arry[0] = _listensock->Fd();
    }

    void Start()
    {
        _isrunning = true;
        while (true)
        {
            // 将listensockfd添加到select内部，让操作系统帮我关心listensockfd上的读事件
            fd_set rfds;    // 定义读事件集合
            FD_ZERO(&rfds); // 清空集合
            int maxfd = defaultfd;
            for (int i = 0; i < size; i++)
            {
                if (_fd_arry[i] == defaultfd)
                    continue;
                // 每次select之前，都要对rfds重置
                FD_SET(_fd_arry[i], &rfds);
                // 最大fd一定是变化的，需要更新
                if (maxfd < _fd_arry[i])
                    maxfd = _fd_arry[i];
            }
            PrintFd();
            int n = select(maxfd, &rfds, nullptr, nullptr, nullptr); // 这里select的第二个参数是输入输出型参数
            // 输入时表示用户告诉内核，帮我关心哪些fd上的读事件就绪
            // 输出时表示内核告诉用户，哪些fd上读事件就绪
            // rfds是位图结构，比特位的位置表示fd编号
            // select返回值>0表示有几个文件描述符就绪
            // select的timeout设置为nullptr表示阻塞读取
            switch (n)
            {
            case -1:
                LOG(LogLevel::ERROR) << "select error !";
                break;
            case 0:
                LOG(LogLevel::INFO) << "time out...";
                break;
            default:
                // 有事件就绪：可能是新连接到来或者是普通fd上的读事件就绪
                LOG(LogLevel::INFO) << "有事件就绪..., n = " << n;
                Dispatcher(rfds); // 处理就绪事件
                break;
            }
        }

        _isrunning = false;
    }

    // 事件派发器
    void Dispatcher(fd_set &rfds)
    {
        // 这里有事件就绪：可能是新连接到来或者是普通fd上的读事件就绪
        // 判断有事件就绪：指定文件描述符在rfds里就证明该fd上有事件就绪
        for (int i = 0; i < size; i++)
        {
            if (_fd_arry[i] == defaultfd)
                continue;
            if (FD_ISSET(_fd_arry[i], &rfds))
            {
                if (_fd_arry[i] == _listensock->Fd())
                {
                    // 新连接到来
                    Accpter();
                }
                else
                {
                    // 普通读事件就绪
                    Recever(_fd_arry[i], i);
                }
            }
        }
    }

    // 连接管理器
    void Accpter()
    {
        InetAddr client;
        int connectfd = _listensock->Accept(&client); // 这里accept不会阻塞，因为这里事件就绪了才会进来
        if (connectfd >= 0)
        {
            LOG(LogLevel::INFO) << "get a new link, sockfd: " << connectfd << ", client is: " << client.StringAddr();
            int pos = 0;

            // 将新的connectfd，通过辅助数组托管给select,以便后续能够继续在connectfd上读取数据
            for (; pos < size; pos++)
            {
                if (_fd_arry[pos] == defaultfd)
                    break;
            }
            if (pos == size)
            {
                LOG(LogLevel::WARNING) << "select server full";
                close(connectfd);
            }
            else
            {
                _fd_arry[pos] == connectfd;
            }
        }
    }

    // IO处理器
    void Recever(int fd, int pos)
    {
        char buffer[1024];
        ssize_t n = recv(fd, buffer, sizeof(buffer) - 1, 0); // 这里读取就不会阻塞了，因为已经有读事件就绪才进来的
        if (n > 0)
        {
            buffer[n] = '\0';
            std::cout << "client say@ " << buffer << std::endl;
        }
        else if (n == 0) // 读到0表示读到文件结尾，说明客户端退出了
        {
            LOG(LogLevel::INFO) << "clien quit...";
            // 1. 不要让select在关系这个fd了
            _fd_arry[pos] = defaultfd;
            // 2. 关闭fd
            close(fd);
        }
        else
        {
            LOG(LogLevel::ERROR) << "recv error";
            _fd_arry[pos] = defaultfd;
            close(fd);
        }
    }

    void PrintFd()
    {
        std::cout << "_fd_array[]: ";
        for (int i = 0; i < size; i++)
        {
            if (_fd_arry[i] == defaultfd)
                continue;
            std::cout << _fd_arry[i] << " ";
        }
        std::cout << "\r\n";
    }

    void Stop()
    {
        _isrunning = false;
    }

    ~SelectServer() {}

private:
    std::unique_ptr<Socket> _listensock;
    bool _isrunning;
    int _fd_arry[size]; // 辅助数组,保存服务器历史获取过的所有的fd
};